#!/usr/bin/perl

no warnings utf8;

use WWW::Page;
use Import::Client;

my $page = new WWW::Page ({
	'source' => $ENV{'PATH_TRANSLATED'},
	'script-filename' => $ENV{'SCRIPT_FILENAME'},
	'document-root' => $ENV{'DOCUMENT_ROOT'},
	'xslt-root' => "$ENV{'DOCUMENT_ROOT'}/../data/xsl",
	'request-uri' => $ENV{'REQUEST_URI'}}
);

print $page->header;
print $page->content;
